home *** CD-ROM | disk | FTP | other *** search
/ Resource for Source: C/C++ / Resource for Source - C-C++.iso / codelib1 / v_01_05 / 1n05047a < prev    next >
Encoding:
Text File  |  1995-11-01  |  197 b   |  17 lines
  1.  
  2. unsigned long factorial(unsigned long n)
  3.     {
  4.     unsigned long result;
  5.  
  6.     if (n > 1LU)
  7.         {
  8.         for (unsigned long x = 2LU; x <= n; ++x)
  9.             {
  10.             result *= x;
  11.             }
  12.         }
  13.  
  14.     return result;
  15.     }
  16.  
  17.